COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	 
C00008 ENDMK
C⊗;
 

(PROGN
(COND ((STATUS FEATURES NEWIO)
       (DEFUN ALT-EMACRO (ASCII ACTION)
	      (SSTATUS TTYINT ASCII
		       (LIST 'LAMBDA (LIST NIL NIL)
			     (LIST '%EVALUATE ACTION)
 			     (LIST '*THROS ''%EDITOR-TOPLEVEL t))))
       (DEFUN EMACRO (ASCII ACTION)
	      (SETSYNTAX ASCII 'SPLICING (LIST 'LAMBDA () (LIST '%EVALUATE ACTION)
					       (subst 
						() 
						() 
						'(*throw '%editor-toplevel t))))
	      (APPLY 'SSTATUS (LIST 'SYNTAX ASCII 133984.))
	      T))
      (T (DEFUN EMACRO (ASCII ACTION) 
		(SETSYNTAX ASCII 'SPLICING (LIST 'LAMBDA NIL ACTION))
		T)))
(EMACRO  471. ''W)

(EMACRO  503. ''W)

(EMACRO  453. ''EXIT)

(EMACRO  485. ''EXIT)

(EMACRO  468. ''TOP) 

(EMACRO  500. ''TOP) 

(EMACRO  452. ''DELETE) 

(EMACRO  484. ''DELETE) 

(EMACRO  208. ''P) 

(EMACRO  240. ''P) 

(EMACRO  336. ''PS) 

(EMACRO  368. ''PS) 

(EMACRO  464. ''PP) 

(EMACRO  496. ''PP) 

(EMACRO  467. ''SAVE) 

(EMACRO  499. ''SAVE) 

(EMACRO  469. ''↑) 

(ALT-EMACBO  204. ''L)

(ALT-EMACRO  236. ''L)

(EMACRO  332.''LS)

(EMACRO  364. ''LS)

(EMACRO  466. ''NX) 

(EMACRO  498. ''NX	 

(AMACRO  460. ''BK) 
¬
(EMACRM  4→2. ''BK! 

(EMACBO  454, ''F) 

(EMACRO  486. ''F) 
¬
(EMACRM  450. ''BF) 

(EMAC@%<@@hpHX@NO	R@~(~∀Q5βπ%≡@ffP8@NO%∃≠β)π R@~∀4⊂Q≠¬π%≡@fn`\NO%5β)π⊂$@~∧~(Q⊗6~J=↓β→MM9α9≡6ε$~!%hP4)",jε∞Jz↓↓MYαUbα:yX∃$≤¬∀hPβ"JλY00tI@P⊂~U⊂∪CSePPεB∧E∀"S`a`∩O  495. ''OK) 

(EMACRO  409. #'LI) 

λ∧Q≠¬π%≡@hhb\α↓≥≡2JI4λhQ",X_5∀z∧εC#"d∧r<du∀hPβ"JλY00tITλ
¬fEH	iiIj(β!!"J⊃)X0p	'H⊂~≠\K⊂∪Si∩TPεEβE∀"fPai'Pλ~XXGλ∪Si$JPεEεB∀"f`Pi'P⊂
~≠↔	Si'THεAεE
 ¬MACRO  458 ≤@≤O%≡R~∀4RB⊗&ε≥∩0~α∧B3∩rε¬bJQ!PBDYX∀≥∀t∧β#≠5`β
R∀↓PPH%λTl8∧Sd∧
m¬DK@∀HεAεE
 ¬MACRO  435. 3,∧R@~(~∀Q5βπ%≡@hfL8@hLR~∀4RB⊗ ,_:$jαε@fuHλ
W
PεEεBα(EMACRO  438.4∧\R@4⊂∩)D*6ε∞α)rαβF7∩bβu`
$↓ C"Eλαf`aT'P⊂~
_⊂∞ 8,∧R@~(~∀Q5βπ%≡@hhb8@r\R~∀4RB⊗ ,_:$jαε6β"rε¬bJQ!PBDYX∀≥∀t∧β≠βU`αk
e∀hPQ%∧,L_:$`4λlεeH,E@∀PεEβE∀"fPai'Pλ→X⊂↔8@Zf\$@~∀~(Q⊗6~J=↓β→Aa9αiQ9%h $	D*6ε∞α)rαβ6π∩rαTUbJQ!PBDYX∀
∀t∧β≠¬`αk2e∀hPβ"JλY00tI@P⊂→XLTε -↔,∧R@~(~∀Q5βπ%≡@fbd8@Zp\$@~(hQ",X_5∀z∧ε3~d¬SJr∀↓P@H%λTl8∧Sd∧

dE@⊂∪SbV$j∀PβE
(EIACRLε@hlDX	↓≥<jε∞⊗@¬⊂hPβ"JλYα`ai∪β 493,∧@@Nα:6ε∞-A$4!Q"D≤yhBαBλ∧uλ~∃0	P⊃ `j*T"iP'⊃i`	O)
       (D@
,qα&6~J=↓D
N∞→∀∧≥I→t`% εE∧H⊂⊂⊂⊂λ∀)bj∀lg" V⊂ iaRdP∪vXqy7FB∧@DP
&$ijλ∪`AMB@	αA9∪⊂⊃α~R&>p¬∩Hh!∀ααα∧∧αD
λ	EJα∧z5≥∧~JU~αα∪∩*:λ	tk→U⊂6∧λ4pr)∀..π⊗mKB%⊃"B(∧∧λλλλ_u∩3iE(
#!∧λλλ∧∧
⊃¬λα"c*S⊂ f`Pi'P∀⊂iaddH ab$SβJ) 
λ	↓(SEPS@39)β0A¬'πβ∩O[CGβ∪<4(HH%↓↓αB2&N ∧α<D→X$$
	i∀b∧_:DL@pπ∀TCE		AAT@∪∨8R@@%Hh  (%λD,5λ)uα¬λ)t8h!∀αE¬)xr∧t→DhPα(λ∧∧λλλ¬∧αb`⊗ALUATE #TOP)
α	       (%EVAHUATE '(MAPCH(*A (*B) *@εRRR4⊂∩@@@@@@!β↔: ↓!"⊗λ∧αD≤_~"αT5∀α=¬)xrJαα⊂	"U*i' L¬∪_R$R~(J↓↓↓↓α↓↓!⊗-2ε %X~D*αu
¬∩αα
P$¬λ¬!) (P@%=∞A:La↓*
JI%$Q!∩αα∧∧αααλ∧Q*J4S@⊂∃∀TFEαP j'SdaVbQ$j!gSd¬AND) 

λ∧Q	→!%∨ ↓# ⊗>$(4)↓E~⊗@%8ε3JH4λf5H	s(_tSh↓QHλλ∧∧λλ
	I4u⊂	R)εEαP⊂⊂⊂λ∪←FEαP⊂⊂⊂λ∀ IST 'LAMBDA
λ	↓   # H	
∩∩@@Q→%' @O∃"~∧∩$∩@O04⊂∩α∩Q→∪'P@G#+=)α@QIβλR$RRRR~∀%∧
R>6L→6⊗∩M"ε <YX∀dλ(β!! J⊃λXT⊂	'T⊂*g(Uej"P
)b`∀SYNTAX 33.d\@FLXRAβQ_∞&&~j⊗∩&$~0≤@303HE(β"AQJ⊃1	~α!gfS`g" FAS@)5βε@@4⊂∩@@@@AIβλA∃	∪(A%_	α∩≤Y↓"εL!αJB8I%"→x2¬
⊃Q Jα∧∧ααDXh∀bαλ(T"α*#!↓(λλ∧∧
⊂q*J(⊂∂(H'$f∀CE	     (APP@→2Oπ%+9∪ @Q1∪'(@≥	'-αBNRε%*MαV$JI%%M!%αQHh  (%	∀l8∧SdεL
KD∧h∧0q]∀TFE
$f`aT'P⊃38. 'λact))
(IMACRO 334.NQ]←β∪7π⊃JH4)"Ljε∞Jz↓MYYp∧α:FmxM\9
*!Q@εE∀→2s8)≠x⊂6pXy3Vr↑80w2λ∀6pqY|⊂3 \P21`+ (mac hsp)) a`+β#?3?∞!$4λhQ#∪↔4επ⊗←∧	V∞≡←↓PBα∞∞&}>aQ"αα¬∞6/'∀∞6∂6U]V∞∨-z2π"⊃Q"αα¬V/6≥NV∂&T¬εfO>@α>∨$¬εn∞>-rn/∞⊗v"∧Ur≡≡U∃∩Hh$∧απ"∀λλ.M{:0e\9~5={;8-l
#"AQJ→→,nαs⊂ ]5vt`#-commomic-editcommand))